home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 17 / AMIGAplus Sonderheft 17 (1999)(ICP)(DE)[!].iso / Rexx / squelette.AmiCAD < prev    next >
Text File  |  1998-01-17  |  564b  |  23 lines
  1. /* Ce fichier vous donne un exemple de structure possible
  2. pour un fichier de macros appelé par AmiCAD, par le menu Macros */
  3.  
  4. options results     /* indispensable pour récupérer le résultat des macros */
  5.  
  6. signal on error     /* pour l'interception des erreurs */
  7. signal on syntax
  8.  
  9. /* Votre programme devra être placé après ce commentaire */
  10.  
  11.  
  12. exit
  13.  
  14. /* Traitement des erreurs, interruption du programme */
  15. syntax:
  16. erreur=RC
  17. 'MESSAGE("Erreur de syntaxe"+CHR(10)+"en ligne 'SIGL'"+CHR(10)+"'errortext(erreur)'")'
  18. exit
  19.  
  20. error:
  21. 'MESSAGE("Erreur en ligne 'SIGL'")'
  22. exit
  23.